home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Prog / S / Scientist's Spreadsheet / Procedures / Demo Procedure next >
Encoding:
Text File  |  1987-02-26  |  647 b   |  33 lines  |  [TEXT/TEXT]
  1.  
  2. label demo
  3. prompt 'Hi there, Im Scientists Spreadsheet, a Scientific Data Manipulator'
  4. prompt 'please arrange the command and graphics windows'
  5. input junk 'so that they dont overlap, and hit return'
  6. delete variable junk
  7. allocate 128 2
  8. samp .025
  9. start -1.6
  10. interpolated true
  11. title 'Example Table'
  12. colname 1 'x'
  13. colname 2 'sin(1/x)'
  14. cmath 1 #/ 1 = 2
  15. cfunction sin 2 2
  16. clear
  17. scale 1 2
  18. axes
  19. plot 1 2
  20. plot 1 2 stars
  21. label loop
  22. cursor 'please select a point on the graph and click the mouse'
  23. prompt 'that point had coordinates ' @xpos ' and ' @ypos
  24. input answer 'pick another point ? y or n'
  25. if @answer s= y
  26. goto loop
  27. delete variable answer
  28. return
  29.  
  30.  
  31.  
  32.  
  33.